home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2010 April / PCWorld0410.iso / hity wydania / Ubuntu 9.10 PL / karmelkowy-koliberek-desktop-9.10-i386-PL.iso / casper / filesystem.squashfs / usr / share / m17n / KHMR-OTF.flt < prev    next >
Encoding:
Text File  |  2009-04-29  |  5.3 KB  |  198 lines
  1. ;; KHMR-OTF.flt -- Font Layout Table for Khmer OpenType fonts
  2. ;; Copyright (C) 2005, 2007  AIST (H15PRO112)
  3. ;; See the end for copying conditions.
  4.  
  5. (font layouter khmr-otf nil
  6.       (font (nil nil unicode-bmp :otf=khmr=pres)))
  7.  
  8. ;;; <li> KHMR-OTF.flt
  9. ;;;
  10. ;;; For Khmer OpenType fonts to draw Khmer.
  11. ;;; A Font is available from 
  12. ;;; <http://www.khmeros.info/drupal/?q=en/download/fonts>.
  13.  
  14. (category
  15.  (0x1780 0x17FF ?E)            ; E: else
  16.  (0x19E0 0x19FF ?E)
  17.  (0x1780 0x17B3 ?C)            ; C: consonant & independent vowel
  18.  (0x179A    ?R)            ; R: RO
  19.  (0x17B6    ?p)            ; p: vowel sign (post)
  20.  (0x17B7 0x17BA ?a)            ; a: vowel sign (above)
  21.  (0x17BB 0x17BD ?b)            ; b: vowel sign (below)
  22.  (0x17BE    ?A)            ; A: vowel sign (two-part, above)
  23.  (0x17BF 0x17C0 ?P)            ; P: vowel sign (two-part, post)
  24.  (0x17C1 0x17C3 ?m)            ; m: vowel sign (pre)
  25.  (0x17C4 0x17C5 ?P)
  26.  (0x17C6    ?s)            ; s: sign (above)
  27.  (0x17C7 0x17C8 ?S)            ; S: sign (post)
  28.  (0x17C9 0x17CA ?c)            ; c: consonant shifter
  29.  (0x17CB 0x17D1 ?s)
  30.  (0x17CC    ?r)            ; r: ROBAT
  31.  (0x17D2    ?H)            ; H: COENG
  32.  (0x17D3    ?s)
  33.  (0x17DD    ?s)
  34.  (0x200C    ?N)            ; N: ZERO WIDTH NON-JOINER
  35.  (0x200D    ?J)            ; J: ZERO WIDTH JOINER
  36.  )
  37.  
  38. ;; Generic syllable pattern is as follows.
  39. ;; [CR](r|N?c)?(HCr?)*(HR)?(HCr?)*[NJ]?(m|b|a|A|p|P)?s*S?(H[CR])?
  40.  
  41. ;; Step 0.
  42. ;; Move m to the beginning.
  43. ;; Split A and P.
  44. ;; Exchange the order of pP and s.
  45. ;; Move HR before the base.
  46.  
  47. (generator
  48.  (0
  49.   (cond
  50.  
  51.    ;; pre vowel sign
  52.    ;;1    2       3       4  5     67            8  9    10
  53.    ("([CR](r|N?c)?(HCr?)*)(HR(r)?)?((HCr?)*[NJ]?)(m)(s*S?(H[CR])?)"
  54.     < | (8 =) (4 = =) (1 = *) (5 =) (6 = *) (9 = *) | > )
  55.  
  56.    ;; two-part above vowel sign
  57.    ;;1    2       3       4  5     67                8
  58.    ("([CR](r|N?c)?(HCr?)*)(HR(r)?)?((HCr?)*[NJ]?As*S?(H[CR])?)"
  59.     < | 0x17C1 (4 = =) (1 = *) (5 =) (6 = *) | > )
  60.  
  61.    ;; post vowel sign
  62.    ;;1    2       3       4  5     67            8  9   10 11
  63.    ("([CR](r|N?c)?(HCr?)*)(HR(r)?)?((HCr?)*[NJ]?)(p)(s*)(S?(H[CR])?)"
  64.     < | (4 = =) (1 = *) (5 =) (6 = *) (9 = *) (8 =) (10 = *) | > )
  65.  
  66.    ;; two-part post vowel sign
  67.    ;;1    2       3       4  5     67            8  9   10 11
  68.    ("([CR](r|N?c)?(HCr?)*)(HR(r)?)?((HCr?)*[NJ]?)(P)(s*)(S?(H[CR])?)"
  69.     < | 0x17C1 (4 = =) (1 = *) (5 =) (6 = *) (9 = *) (8 =) (10 = *) | > )
  70.  
  71.    ;; other vowel signs or no vowel sign
  72.    ;;1    2       3       4  5     67                     8
  73.    ("([CR](r|N?c)?(HCr?)*)(HR(r)?)?((HCr?)*[NJ]?[b|a]?s*S?(H[CR])?)"
  74.     < | (4 = =) (1 = *) (5 =) (6 = *) | > )
  75.  
  76.    ("." =))
  77.   *))
  78.  
  79. ;; Now a syllable looks like below.
  80. ;; m?(HR)?[CR](r|N?c)?(HCr?)*[NJ]?(b|a|A)?s*(p|P)?S?(H[CR])?
  81.  
  82. ;; Step 1.
  83. ;; Set the form of consonant shifter.
  84.  
  85. (generator
  86.  (0
  87.   (cond
  88.    ;; shifter + above vowel sign without ZWNJ
  89.    ;; Shifter take blwf.  HR takes pref.  HC's take blwf or pstf.
  90.    ;; 1   2    3     4      5     6     7     8
  91.    (" (m)?(HR)?([CR]c(HCr?)*(N|J)?(a|A))(s*S?)(H[CR])? "
  92.     |
  93.     (1 =)
  94.     (2 otf:khmr=pref+)
  95.     (3 otf:khmr=blwf,abvf,pstf+)
  96.     (7 = *)
  97.     (8 otf:khmr=blwf,pstf+)
  98.     | )
  99.  
  100.    ;; shifter + ZWNJ + above vowel sign, or, shifter without above vowel sign
  101.    ;; Shifter stays above.  HR takes pref.  HC's take blwf or pstf.
  102.    ;; 1   2    3        45       6           7   8     9   10  11
  103.    (" (m)?(HR)?([CR]N?c)((HCr?)*)([NJ]?[ba]?)(A)?(s*p?)(P)?(S)?(H[CR])? "
  104.     |
  105.     (1 =)
  106.     (2 otf:khmr=pref+)
  107.     (3 = *)
  108.     (4 otf:khmr=blwf,pstf+)
  109.     (6 = *)
  110.     (7 otf:khmr=abvf+)
  111.     (8 = *)
  112.     (9 otf:khmr=pstf+)
  113.     (10 =)
  114.     (11 otf:khmr=blwf,pstf+)
  115.     | )
  116.  
  117.    ;; no shifter
  118.    ;; 1   2    3       45       6           7   8     9   10  11
  119.    (" (m)?(HR)?([CR]r?)((HCr?)*)([NJ]?[ba]?)(A)?(s*p?)(P)?(S)?(H[CR])? "
  120.     |
  121.     (1 =)
  122.     (2 otf:khmr=pref+)
  123.     (3 = *)
  124.     (4 otf:khmr=blwf,pstf+)
  125.     (6 = *)
  126.     (7 otf:khmr=abvf+)
  127.     (8 = *)
  128.     (9 otf:khmr=pstf+)
  129.     (10 =)
  130.     (11 otf:khmr=blwf,pstf+)
  131.     | )
  132.  
  133.    ("." =))
  134.   *))
  135.  
  136. ;; Now a syllable looks like below.  ~ characters are OTF feature applied.
  137. ;; m?(HR)?[CR](r|c)?(HCr?)*[NJ]?(b|a|A)?s*(p|P)?S?(H[CR])?
  138. ;;    ~~   ~~    ~   ~~~~            ~       ~     ~~~~~
  139.  
  140. ;; Step 2.
  141. ;; Concatenate adjacent Khmer syllables.
  142. ;; Remove J.  Retain N to prevent ligature.
  143.  
  144. (generator
  145.  (0
  146.   (cond
  147.    ("  ")
  148.    ("J")
  149.    ("." =))
  150.   *))
  151.  
  152. ;; Step 3.
  153. ;; Apply other OTF features.
  154.  
  155. (generator
  156.  (0
  157.   (cond
  158.    (" ([^ ]*) "
  159.     (1 otf:khmr=pres,blws,abvs,psts,clig))
  160.    ("."
  161.     [ = ]))
  162.   *))
  163.  
  164. ;; Step 4.
  165. ;; Remove N to clean up.
  166. (generator
  167.  (0
  168.   (cond
  169.    ("N")
  170.    ("." =))
  171.   *))
  172.  
  173. ;; Copyright (C) 2005, 2007
  174. ;;   National Institute of Advanced Industrial Science and Technology (AIST)
  175. ;;   Registration Number H15PRO112
  176.  
  177. ;; This file is part of the m17n database; a sub-part of the m17n
  178. ;; library.
  179.  
  180. ;; The m17n library is free software; you can redistribute it and/or
  181. ;; modify it under the terms of the GNU Lesser General Public License
  182. ;; as published by the Free Software Foundation; either version 2.1 of
  183. ;; the License, or (at your option) any later version.
  184.  
  185. ;; The m17n library is distributed in the hope that it will be useful,
  186. ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  187. ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  188. ;; Lesser General Public License for more details.
  189.  
  190. ;; You should have received a copy of the GNU Lesser General Public
  191. ;; License along with the m17n library; if not, write to the Free
  192. ;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
  193. ;; Boston, MA 02110-1301, USA.
  194.  
  195. ;; Local Variables:
  196. ;; mode: emacs-lisp
  197. ;; End:
  198.